home *** CD-ROM | disk | FTP | other *** search
- VERSION 5.00
- Begin VB.Form frmGo
- BackColor = &H80000012&
- BorderStyle = 1 'Fixed Single
- Caption = "Go"
- ClientHeight = 2955
- ClientLeft = 4635
- ClientTop = 2250
- ClientWidth = 1590
- Icon = "frmGo.frx":0000
- LinkTopic = "Form1"
- MaxButton = 0 'False
- MinButton = 0 'False
- ScaleHeight = 2955
- ScaleWidth = 1590
- Begin VB.CommandButton cmdDone
- Caption = "Done"
- Height = 375
- Left = 240
- MousePointer = 10 'Up Arrow
- TabIndex = 0
- Top = 2400
- Width = 1215
- End
- Begin VB.Label Label1
- BackColor = &H80000012&
- Caption = "Search Engines"
- BeginProperty Font
- Name = "MS Sans Serif"
- Size = 12
- Charset = 0
- Weight = 700
- Underline = 0 'False
- Italic = 0 'False
- Strikethrough = 0 'False
- EndProperty
- ForeColor = &H00FF0000&
- Height = 735
- Left = 360
- MousePointer = 10 'Up Arrow
- TabIndex = 4
- Top = 1560
- Width = 1335
- End
- Begin VB.Label lblHome
- BackColor = &H80000012&
- Caption = "Home"
- BeginProperty Font
- Name = "MS Sans Serif"
- Size = 12
- Charset = 0
- Weight = 700
- Underline = 0 'False
- Italic = 0 'False
- Strikethrough = 0 'False
- EndProperty
- ForeColor = &H00FF0000&
- Height = 495
- Left = 360
- MousePointer = 10 'Up Arrow
- TabIndex = 3
- Top = 1080
- Width = 1215
- End
- Begin VB.Label lblFoward
- BackColor = &H80000012&
- Caption = "Foward"
- BeginProperty Font
- Name = "MS Sans Serif"
- Size = 12
- Charset = 0
- Weight = 700
- Underline = 0 'False
- Italic = 0 'False
- Strikethrough = 0 'False
- EndProperty
- ForeColor = &H00FF0000&
- Height = 495
- Left = 360
- MousePointer = 10 'Up Arrow
- TabIndex = 2
- Top = 600
- Width = 1215
- End
- Begin VB.Label lblBack
- BackColor = &H80000012&
- Caption = "Back"
- BeginProperty Font
- Name = "MS Sans Serif"
- Size = 12
- Charset = 0
- Weight = 700
- Underline = 0 'False
- Italic = 0 'False
- Strikethrough = 0 'False
- EndProperty
- ForeColor = &H00FF0000&
- Height = 495
- Left = 360
- MousePointer = 10 'Up Arrow
- TabIndex = 1
- Top = 120
- Width = 1215
- End
- Attribute VB_Name = "frmGo"
- Attribute VB_GlobalNameSpace = False
- Attribute VB_Creatable = False
- Attribute VB_PredeclaredId = True
- Attribute VB_Exposed = False
- Private Sub cmdDone_Click()
- frmGo.Hide
- frmHElp.Show
- End Sub
- Private Sub Label1_Click()
- frmsearchengines.Show
- frmGo.Hide
- End Sub
- Private Sub lblBack_Click()
- frmBack.Show
- frmGo.Hide
- End Sub
- Private Sub lblFoward_Click()
- frmFoward.Show
- frmGo.Hide
- End Sub
- Private Sub lblHome_Click()
- frmHome.Show
- frmGo.Hide
- End Sub
-